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Find out why. . . 

^1 in Editorial 

^1 in User Support 

*1 in Software 

^1 in Circulation 

^1 in Advertising Sales 



you CAN COUNT ON 
ANTIC TO BE THERE WHEN 
& WHERE you NEED 
US- EVERY MONTH! 

No other magazine covers the 
Atari market as comprehensively 
as Antic, and no magazine is more 
passionately committed to bring- 
ing you and the Atari together. No 
wonder that more Atari owners 
read Antic than any other com- 
puter magazine. 

A subscription to Antic is sur- 
prisingly inexpensive— just $2.33 
a copy if you act quickly. You 
don't have to pay now; we'll be 
more than happy to bill you later. 
(Your first copy will be on its way 
to you in 4 to 6 weeks. Watch 
for it!) 




GET STARTED TODAY! 



N 




The ATAJlTResoufct: 



SAVE $14.00 



GET STARTED TODAy! 



Lowest Price Available 



LJ Yes, please send me a full year of Antic Magazine (12 issues) at the special money-saving rate 
of $28.00. 1 understand that's a discount of over 34% off the newsstand rate. Bill me later. 



Name. 



(please print) 



Company . 
Address _ 
City 



.State. 



.Zip. 



This Offer For New Subscribers Only 

EF5S1A 



Please allow 4-6 weeks for delivery of your first 

Issue. 

Canadian & Mexican residents add 56.00 per year. 

Other Foreign subscriptions add S18.00 per year. 

(Payment must accompany all overseas orders.) 



^P ^^^ The ADUirRtJource 



THE EASIEST WAy 
TO GET STARTED! 




Magazine & Disk 



_ Just $8.32 Per Month 

U Yes, I want more time to enjoy my Atari computer. Please send me the monthly Software Disk 
(12 issues) with the regular Antic Magazine subscription at the special money-saving rate 
of $99.95. 

n Check enclosed [3 Bill my credit card 

Name __^_________^ 



Company. 



(please print) 



Address . 



Credit Card * 

Exp. Date Signature _ 

Tliis Offer For New Subscribers Only 

EF5S1B 



D VISA n MC 



Please allow 4-6 weeks for delivery of your first 

Issue. 

All Foreign subscriptions add 550.00 per year. 

Use envelope for tills card. 
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SAVE $14.00 



GET STARTED TODAy! 



Lowest Price Available 



O Yes, please send me a full year of Antic Magazine (12 Issues) at the special money-saving rate 
of $28.00. 1 understand that's a discountof over34%off the newsstand rate. Bill me later. 



Name. 



(please print) 



Company. 
Address _ 



City. 



. State . 



-Zip. 



This Offer For New Subscribers Only 

EF5S1A 



Please allow 4-6 weeks for delivery of your first 

Issue. 

Canadian & Mexican residents add 56.00 per year. 

Other Foreign subscriptions add 518.00 per year. 

(Payment must accompany all overseas orders.) 



BUSINESS REPLY MAIL 

FIRST CLASS PERMIT NO. 22047 SAN FRANCISCO, CA 94 1 07-9989 ' 
POSTAGE WILL BE PAID BY ADDRESSEE , 



NO POSTAGE 

NECESSARY 

IF MAILED 

IN THE 

UNITED STATES 



^W ^^ The ATARI Resource 

Editorial Offices 

524 Second Street 

San Francisco, CA 94107-9989 



II,I...ImIm.IIII...I.mII.I..I.I..I..I.I.I.mI..II 



BUSINESS REPLY MAIL 

FIRST CLASS PERMIT NO. 22047 SAN FRANCISCO. CA 94 1 07 -9989 i 
POSTAGE WILL BE PAID BY ADDRESSEE ' 



NO POSTAGE 

NECESSARY 

IF MAILED 

IN THE 

UNITED STATES 



^W ^^ The ATARI Resource 

Editorial Offices 

524 Second Street 

San Francisco, CA 94107-9989 



II, I. mI. . I. .. nil. mI... II. I. .1.1.. I. .1.1. 1. ..I. .11 



BUSINESS REPLY MAIL 

FIRST CLASS PERMIT NO. 22047 SAN FRANCISCO, CA 94 107-9989 ! 
POSTAGE WILL BE PAID BY ADDRESSEE i 



NO POSTAGE 

NECESSARY 

IF MAILED 

IN THE 

UNITED STATES 



▲itflc 

^^ ^^ The ATARI Resource 

Editorial Offices 
524 Second Street 
San Francisco, CA 94107-9989 



ll.l...l..l..illll...l...ll.l..l.l..l,.l.l.l...l..ll 



More colorful enjoy- 
ment for your Atari 
from Antic. Each of 
these BASIC programs 
is a mini computer art- 
work, just for you! 



1 PRINT ■■■sUHfliT GRAPHICS 


M0DEC9,ie, 


IIJ"; :INPUT 


A 






29 


REM LIGHTSHOU aZ 


38 


GRAPHICS 


A: FOR 1=0 T 


79: FOR J=0 TO 79 : COLO 


R I*J/4+4 




40 


PLOT I,79-J:PL0T J, 7 


9-I:PLOT 79 


-J,79-I:PL0T 


79-1, 79-J: PLOT 79-1, J: 


PLOT 79-J,I 


:PL0T I,J:PL 


OT 


J, I 




50 


HEKT J:NEKT I 


60 


GOTO 68 




5 Z=0 


' 


10 


GRAPHICS 


11 


20 


FOR 1=1 TO 79 


30 


Z=Z*1 :IF 


Z>9 THEN Z= 


1 






35 


COLOR Z 




40 


PLOT I,K 


:DRAUIT0 79-1 


, X 






SO 


PLOT I,198-K:DHAUTD 


79 


-I,190-K 




60 


K=K*2:IF 


K>198 THEN 


K = 




70 


MEKT I:Z 


=Z+l:GOT0 10 


10 


GRAPHICS 


8+16 


28 


SETCOLOR 


2,18.8 


38 


FOR 1=1 


rO 198 STEP 


7 






48 


PLOT 1,8 


:DRAUTa 388. 


I 






45 


PLOT 388 


-I.19e:DRAUT 


8.198-1 




50 


PLOT 8,198-I:DHAUT0 


I, 


a 




55 


PLOT 380 


, I:DRAUTO 38 


8- 


1,198 




68 


NEXT I 




65 


GOTO 65 





10 GRAPHICS 11 

20 FOR H=0 TO 78 

30 C=C+l:COLOH C : IF C=l 

27 THEN C=8 

40 PLOT K,V:DRAUT0 78-K 

,Y:DRAWT0 78-K,191-V:DR 

AUTO K, 191-Y : DRAUTO K,Y 

58 Y=Y*2:IF Y>191 THEN 

Y = 

60 NEKT K:G0T0 20 



